home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
dbase
/
techs.zip
/
TECH11.ZIP
/
LETTER.PRG
< prev
next >
Wrap
Text File
|
1985-11-01
|
805b
|
40 lines
* Program..: Letter.PRG
* Authors..: Laurie Miller, Ray Love
* Date.....: February 1, 1985
* Version..: dBASE III, any version
* Note(s)..: Prints a single letter. Called from Form.PRG
*
SET MARGIN TO 5
?
?
* ---Print the date in Month DD, YYYY format.
? CMONTH( DATE() ), STR( DAY( DATE() ), 2 ) + ", "
?? STR( YEAR( DATE() ), 4 )
?
?
?
* ---Print the header of the letter.
? TRIM( First ) + " " + TRIM( Last )
? Address
? TRIM( City ) + ", " + State + " " + Zip
?
* ---Print the salutation.
? "Dear " + TRIM( First ) + ":"
?
* ---The body of the letter is between TEXT and ENDTEXT.
TEXT
This would be the body of the form letter that you intend to send
to everyone in your database.
ENDTEXT
?
? "Sincerely,"
?
?
?
?
? "Laurie Miller"
?
RETURN
* EOP Letter.PRG